﻿Public Class PhieuGoiTienCrt
    Private _maSo As Integer
    Private _tenKH As String
    Private _soTienGoiTu As Double
    Private _soTienGoiDen As Double
    Private _ngayGoiTu As Date
    Private _ngayGoiDen As Date

    Private _soTienGoi As Double
    Private _ngayGoi As Date
    '
    Private _chkTenKH As Boolean
    Private _chkSoTienGoi As Boolean
    Private _chkNgayGoi As Boolean

    Public Property MaSo() As Integer
        Get
            Return _maSo
        End Get
        Set(ByVal value As Integer)
            _maSo = value
        End Set
    End Property
    Public Property TenKH() As String
        Get
            Return _tenKH
        End Get
        Set(ByVal value As String)
            _tenKH = value
        End Set
    End Property

    Public Property SoTienGoiTu() As Double
        Get
            Return _soTienGoiTu
        End Get
        Set(ByVal value As Double)
            _soTienGoiTu = value
        End Set
    End Property
    Public Property SoTienGoiDen() As Double
        Get
            Return _soTienGoiDen
        End Get
        Set(ByVal value As Double)
            _soTienGoiDen = value
        End Set
    End Property

    Public Property NgayGoiTu() As Date
        Get
            Return _ngayGoiTu
        End Get
        Set(ByVal value As Date)
            _ngayGoiTu = value
        End Set
    End Property
    Public Property NgayGoiDen() As Date
        Get
            Return _ngayGoiDen
        End Get
        Set(ByVal value As Date)
            _ngayGoiDen = value
        End Set
    End Property
    Public Property SoTienGoi() As Double
        Get
            Return _soTienGoi
        End Get
        Set(ByVal value As Double)
            _soTienGoi = value
        End Set
    End Property
    Public Property NgayGoi() As Date
        Get
            Return _ngayGoi
        End Get
        Set(ByVal value As Date)
            _ngayGoi = value
        End Set
    End Property

    Public Property ChkTenKH() As Boolean
        Get
            Return _chkTenKH
        End Get
        Set(ByVal value As Boolean)
            _chkTenKH = value
        End Set
    End Property
    Public Property ChkSoTienGoi() As Boolean
        Get
            Return _chkSoTienGoi
        End Get
        Set(ByVal value As Boolean)
            _chkSoTienGoi = value
        End Set
    End Property
    Public Property ChkNgayGoi() As Boolean
        Get
            Return _chkNgayGoi
        End Get
        Set(ByVal value As Boolean)
            _chkNgayGoi = value
        End Set
    End Property

    Public Sub New()
        _maSo = 0
        _tenKH = ""
        _soTienGoiTu = 0.0
        _soTienGoiDen = 0.0
        _ngayGoiTu = New Date(2000, 1, 1)
        _ngayGoiDen = New Date(2000, 1, 1)
        _soTienGoi = 0.0
        _ngayGoi = New Date(2000, 1, 1)
        _chkTenKH = False
        _chkSoTienGoi = False
        _chkNgayGoi = False

    End Sub
End Class
